home *** CD-ROM | disk | FTP | other *** search
- PXFSLEEP(3F) Last changed: 1-22-99
-
-
- NNAAMMEE
- PPXXFFSSLLEEEEPP - Delays process execution
-
- SSYYNNOOPPSSIISS
- SSUUBBRROOUUTTIINNEE PPXXFFSSLLEEEEPP((_i_s_e_c_o_n_d_s,, _i_s_e_c_l_e_f_t,, _i_e_r_r_o_r))
- IINNTTEEGGEERR _i_s_e_c_o_n_d_s,, _i_s_e_c_l_e_f_t,, ierror
-
- IIMMPPLLEEMMEENNTTAATTIIOONN
- UNICOS, UNICOS/mk, and IRIX systems
-
- DDEESSCCRRIIPPTTIIOONN
- The PPXXFFSSLLEEEEPP subroutine waits _i_s_e_c_o_n_d_s before generating a SSIIGGAALLRRMM
- signal. If a previous PPXXFFSSLLEEEEPP has time remaining, _i_s_e_c_l_e_f_t contains
- the number of seconds until the signal SSIIGGAALLRRMM would have been
- generated.
-
- The following is a list of arguments for this routine:
-
- _i_s_e_c_o_n_d_s Default integer input variable containing the number of
- real-time seconds to wait before sending the calling process
- a SSIIGGAALLRRMM signal.
-
- _i_s_e_c_l_e_f_t Default integer output variable containing the number of
- seconds left until a previous request would have generated a
- SSIIGGAALLRRMM signal.
-
- _i_e_r_r_o_r Default integer output variable containing a status of zero
- if PPXXFFSSLLEEEEPP was successful.
-
- On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
- default when compiling programs with the MIPSpro 7 Fortran 90 compiler
- or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
- F77 compiler.
-
- When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
- UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
- kind unless documented otherwise. On UNICOS and UNICOS/mk, default
- kind is KKIINNDD==88 for integer, real, complex, and logical arguments; on
- IRIX systems, the default kind is KKIINNDD==44.
-
- NNOOTTEESS
- Replace the use of the sslleeeepp(3C) function with the subroutine call to
- PXFSLEEP().
-
- EEXXAAMMPPLLEESS
- program pxftest
- integer iseconds, isecleft, ierror
-
- iseconds = 10
- isecleft = 0
- ierror = 0
- CALL PXFSLEEP(iseconds, isecleft, ierror)
- if (ierror .ne. 0) then
- print *,'FAILED: PXFSLEEP call failed with error = ',ierror
- else
- print *,'PASSED: PXFSLEEP call returned no error'
- endif
- if (isecleft .ne. 0) then
- print *,'FAILED: PXFSLEEP, isecleft not zero, =',isecleft
- endif
- end
-
- SSEEEE AALLSSOO
- aallaarrmm(2)
- sslleeeepp(3C)
-
- _A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed
- version of this man page.
-